Sprite 1984 - 1993/Sprite 1984 - 1993.iso/lib/tcl/tkerror.tcl

Text File | 1992-06-26 | 174 b | 8 lines

# This file contains a default version of the tkError procedure.  It
# just prints out a stack trace.

proc tkerror err {
    global errorInfo
    puts stdout "$errorInfo"
}